return "INIT(variable,...)"cr"Supprime les variables"cr"spécifiées"cr"Le nombre des"cr"arguments est quelconque"
when fonction='RESET' then return "RESET(variable,...)"cr"Remet les variables à zéro"cr"Le nombre des"cr"arguments est quelconque,"cr"leur type également"
when fonction='DEF' then return "DEFinition fonction"cr"Pour définir la fonction"cr"MAX, entrez par exemple"cr"la ligne :"cr"DEF MAX(A,B)=IF(A>B,A,B)"cr"Le mot clé DEF doit"cr"impérativement figurer"cr"au début de la ligne"
when fonction='DATE' then return "DATE(jour)"cr"Renvoie la chaîne"cr"correspondant à la"cr"date actuelle"cr"Jour = 1: le jour de"cr"la semaine est inclus"
when fonction='DAYS' then return "DAYS(date1,date2)"cr"Renvoie le nombre"cr"de jours séparant"cr"les deux dates"cr"Le résultat est positif"cr"si la première date"cr"est antérieure."
when fonction='TIME' then return "TIME(secondes)"cr"Renvoie la chaîne"cr"correspondant à"cr"l'heure système"cr"Si secondes = 1: les"cr"secondes sont incluses"
when fonction='CHR' then return "CHR(code)"cr"Renvoie une chaîne"cr"composée du caractère"cr"dont le code ASCII"cr"a été spécifié"
when fonction='ASC' then return "ASC(chaîne,position)"cr"Renvoie le code"cr"ASCII du caractère"cr"de la chaîne"
when fonction='POS' then return "POS(sous_chaîne,chaîne)"cr"Renvoie la position"cr"de la sous-chaîne"cr"dans la chaîne"
when fonction='SUBS' then return "SUBS(chaîne,position,longueur)"cr"Renvoie la sous-chaîne"cr"de la chaîne"cr"commençant à la position"cr"spécifiée, de longueur"cr"spécifiée"
when fonction='LOWER' then return "LOWER(chaîne)"cr"Renvoie une chaîne"cr"équivalente convertie"cr"en minuscules"
when fonction='UPPER' then return "UPPER(chaîne)"cr"Renvoie une chaîne"cr"équivalente convertie"cr"en MAJUSCULES"
when fonction='LEN' then return "LEN(chaîne)"cr"Renvoie la longueur"cr"de la chaîne"
when fonction='VAL' then return "VAL(chaîne)"cr"Renvoie le nombre"cr"correspondant à"cr"la chaîne"cr"ATTENTION: les"cr"caractères alphabétiques"cr"éventuels doivent figurer"cr"en MAJUSCULES"cr"Ex: N=VAL("'""'"53"'"")'cr'VAL(""$48C"")'
when fonction='STR' then return "STR(nombre)"cr"Renvoie la chaîne"cr"correspondant au"cr"nombre spécifié"
when fonction='STRBIN' then return "STRBIN(nombre)"cr"Renvoie la chaîne"cr"obtenue en convertissant"cr"le nombre spécifié"cr"en binaire (base 2)"
when fonction='STRHEX' then return "STRHEX(nombre)"cr"Renvoie la chaîne"cr"obtenue en convertissant"cr"le nombre spécifié"cr"en hexadécimal (base 16)"
when fonction='CLIPUNIT' then return 'CLIPUNIT(unité)'cr'Choisit l''unité du'cr'presse-papiers'cr'utilisée pour les'cr'opérations de Couper/Coller'
when fonction='SAVBLOCK' then return 'SAVBLOCK(nom fichier'cr'Sauve le texte'cr'sélectionné dans'cr'le fichier spécifié'
when fonction='SUPBLOCK' then return 'SUPBLOCK(0)'cr'Efface le bloc de'cr'texte sélectionné'cr'(non récupérable)'
when fonction='TEXTMARK' then return 'TEXTMARK(-1)'cr'Renvoie le texte'cr'sélectionné'
when fonction='OPÉRATIONS' then return 'Concaténation: ""R""+""F""'cr'Comparaisons:'cr'""A""<""B""'cr'""G"">""H""'cr'""Ju""<>""ju""'cr'Rotations:'cr'""Albert""<<2 ==> bert'cr'""Albert"">>2 ==> Albe'
when fonction='TYPE'
then return "TYPE(caractère)"cr"Code dépendant du type"cr"du caractère spécifié:"cr"1: voyelle"cr"2: lettre"cr"4: majuscule"cr"8: minuscule"cr"16: nombre décimal"cr"32: espace"cr"64: signe ponctuation"cr"128: caractère ASCII"cr"256: nom de fonction"
when fonction='IF' then return "IF(expression,action1,action0)"cr"Calcule l'expression,"cr"puis exécute action 1"cr"si le résultat est non nul,"cr"sinon exécute action0"
when fonction='SECURITY' then return "SECURITY(expression)"cr"Détermine le nombre"cr"maximal de boucles"cr"admissible avant débordement"cr"Vous pouvez aussi utiliser"cr"la combinaison de"cr"touches CTRL ALT ESC"cr"pour interrompre une boucle"
when fonction='WHILE' then return "WHILE(expression,action,...)"cr"Exécute la ou les actions"cr"spécifiées tant que le"cr"résultat de l'expression"cr"est non nul"cr"Pour interrompre une"cr"boucle, appuyez"cr"sur les touches"cr"CTRL ALT ESC"
when fonction='FOR' then return "FOR(init,fin,action,...)"cr"Exécute init, puis la"cr"ou les actions"cr"spécifiées jusqu'à"cr"ce que fin soit faux"cr"Pour interrompre une"cr"boucle, appuyez"cr"sur les touches"cr"CTRL ALT ESC"
when fonction='CONSTANTES' | fonction='COL' | fonction='NBLINES' | fonction='LINE'
then return "Constantes"cr"NBLINES: nombre de lignes"cr"COL: colonne courante"cr"LINE: ligne courante"
when fonction='SGN' then return "SGN(expression)"cr"Donne 1 si l'expression a"cr"un résultat positif,"cr"0 s'il est nul ou"cr"-1 s'il est négatif"
when fonction='ABS' then return "ABS(expression)"cr"Donne la valeur absolue"cr"de l'expression"
when fonction='GOTO' then return "GOTO(colonne,ligne)"cr"Place le curseur à"cr"l'emplacement spécifié"
when fonction='BEGLINE' then return "BEGLINE(ligne)"cr"Place le curseur"cr"au début de la ligne"
when fonction='ENDLINE' then return "ENDLINE(ligne)"cr"Place le curseur"cr"à la fin de la ligne"
when fonction='TRACE' then return "TRACE(1 à 10)"cr"Argument positif:"cr"mémorise l'emplacement"cr"Argument négatif:"cr"place le curseur"cr"à cet emplacement"
when fonction='WLEFT' then return "WLEFT(mots)"cr"Déplace le curseur"cr"du nombre de mots"cr"vers la gauche"
when fonction='WRIGHT' then return "WRIGHT(mots)"cr"Déplace le curseur"cr"du nombre de mots"cr"vers la droite"
when fonction='FIND' then return "FIND(occurences)"cr"Argument positif:"cr"recherche vers la fin"cr"Argument négatif:"cr"recherche vers le début"
when fonction='SETFIND' then return "SETFIND(chaîne)"cr"Fixe la chaîne"cr"à chercher."
when fonction='SETREP' then return "SETREP(chaîne)"cr"Fixe la chaîne"cr"utilisée pour le"cr"remplacement"
when fonction='REPLACE' then return "REPLACE(occurences)"cr"Argument positif:"cr"remplacement vers la fin"cr"Argument négatif:"cr"remplacement vers le début"
when fonction='TESTCASE' then return "TESTCASE(-1/0/1)"cr"Sensibité majuscules"cr"minuscules pour recherche"cr"Argument = -1:"cr"Lecture MAJ=min"cr"Argument nul:"cr"Fixe MAJ<>min"cr"Argument = 1:"cr"Fixe MAJ=min"
when fonction='MESSAGE' then return "MESSAGE(chaînes)"cr"Affiche un message"cr"Les lignes doivent"cr"être séparées par"cr"un saut de ligne"
when fonction='REQUEST' then return "REQUEST(chaînes)"cr"Affiche une requête"cr"Renvoie 1 si OUI, 0 si NON"cr"Les lignes doivent"cr"être séparées par"cr"un saut de ligne"
when fonction='SELECT' then return "SELECT(chaînes)"cr"Permet de choisir une"cr"chaîne parmi plusieurs"cr"Renvoie son numéro"
when fonction='ASK' then return "ASK(chaînes)"cr"Affiche une requête"cr"Permet le renvoi"cr"d'une chaîne saisie"cr"au clavier"
when fonction='REQFILE' then return "REQFILE(chaîne)"cr"Permet de choisir"cr"un fichier à"cr"l'aide d''une requête"cr"système"
when fonction='BLOCK' then return "BLOCK(i)"cr"i=0: colonne début sélection"cr"i=1: ligne début sélection"cr"i=2: colonne fin sélection"cr"i=3: ligne fin sélection"
when fonction='MARK' then return "MARK(0/1)"cr"Sélection d'une zone"cr"de texte"cr"MARK(0): marquage début"cr"MARK(1): marquage fin"
when fonction='UNMARK' then return "UNMARK(0)"cr"Annule la sélection"cr"du texte"
when fonction='EXEC' then return "EXEC(chaîne)"cr"Calcule l'expression"cr"et renvoie son résultat"
when fonction='READLINE' then return "READLINE(ligne)"cr"Lecture contenu ligne"
when fonction='MENU' then return "MENU(chaîne)"cr"Permet de réaliser l'action"cr"associée au menu"cr"La chaîne doit correspondre"cr"au titre du menu"cr'Ex: MENU(""Couper"")'
when fonction='SELTEXT' then return "SELTEXT(code)"cr"code < 0: = numéro de fenêtre"cr"courante."cr"code >= 0: sélectionne la fenêtre"
when fonction='SETFONT' then return 'SETFONT(""fonte"",taille)'cr'Spécifie la fonte'cr'à utiliser dans'cr'la fenêtre courante'cr'Ex: FONT(""topaz.font"",11)'
when fonction='FILENAME' then return "FILENAME(nom)"cr"Renvoie le nom"cr"de la fenêtre"cr"si chaîne nulle"cr"sinon renomme la"cr"fenêtre."
when fonction='MACRO' then return "MACRO(numéro macro)"cr"Lance l'exécution de"cr"la macro spécifiée"cr"Les macros sont définies"cr"par ALT-F1 à ALT-F10"
when fonction='NEW' then return "NEW(titre)"cr"Initialisation du tableau"cr"courant, qui prend"cr"le titre spécifié"
when fonction='LOAD' then return "LOAD(fichier)"cr"Charge le fichier"cr"spécifié"
when fonction='OPEN' then return "OPEN(fichier)"cr"Charge le ou les fichiers"cr"spécifiés."cr"(Jokers possibles)"cr'Ex: OPEN(""Feuilles.#?"")'
when fonction='SAVE' then return "SAVE(fichier)"cr"Sauve le fichier"cr"sous le nom"cr"spécifié."cr"Renvoie 1 si OK"cr"sinon 0"
when fonction='MODIF' then return "MODIF(x)"cr"Renvoie 1 si le"cr"tableau courant"cr"a été modifié"cr"0 sinon"
when fonction='CLOSE' then return "CLOSE(fenêtre)"cr"Assure la fermeture"cr"de la fenêtre"cr"spécifiée"
when fonction='LOCK' then return "LOCK(fenêtre)"cr"Verrouille la fenêtre"cr"spécifiée."cr"Si l'argument vaut"cr"-1 toutes les"cr"fenêtres sont"cr"verrouillées"
when fonction='UNLOCK' then return "UNLOCK(fenêtre)"cr"Déverrouille la fenêtre"cr"spécifiée ou bien"cr"toutes les fenêtres"cr"si l'argument vaut -1"
when fonction='NBTEXT' then return "NBTEXT(type de fenêtre)"cr"Renvoie le nombre de"cr"fenêtres:"cr"type=1: ouvertes"cr"type=0: cachées"cr"type=-1: toutes"
when fonction='SORT' then return "SORT(sens,ligne début,ligne fin)"cr"Trie les lignes de texte"cr"dans la zone indiquée"cr"dans l'ordre aphabétique"cr"si sens > 0"cr"dans l'ordre inverse"cr"si sens < 0"
when fonction='COPY' then return "COPY(clip,chaîne)"cr"La chaîne spécifiée"cr"est recopiée dans"cr"le clip spécifié"
when fonction='MESURE' then return "MESURE(x)"cr"Renvoie la dimension"cr"de la fenêtre ou"cr"de l'écran :"cr"x=0: abscisse"cr"x=1: ordonnée"cr"x=2: largeur"cr"x=3: hauteur"cr"x=4: largeur écran"cr"x=5: hauteur écran"
when fonction='WINDOW' then return "WINDOW(x,y,l,h)"cr"Détermine la position (x y)"cr"et les dimensions (l h)"cr"de la fenêtre courante"cr"en pixels"
when fonction='SEARCH' then return "SEARCH(chaîne)"cr"Recherche le texte"cr"spécifié."cr"Accepte les caractères"cr"génériques AmigaDOS"cr"Ex: SEARCH(""""demand#?"""")"
when fonction='PASTE' then return "PASTE(clip)"cr"Le clip spécifié"cr"est recopié dans"cr"les cellules où est"cr"situé le curseur"
when fonction='SETCLIP' then return "SETCLIP(clip)"cr"Sélectionne le clip"cr"actif pour"cr"l'utilisateur (1 à 10)"
when fonction='ZEROS' then return "ZEROS(z,c|z...)"cr"Détermine si les"cr"zéros de fin doivent"cr"ou non être affichés"cr"ZEROS(cellule)"cr"Renvoie l'état"cr"correspondant"
when fonction='PRINT' then return "PRINT(zone)"cr"Imprime la zone"cr"spécifiée."
when fonction='CALL' then return "CALL(script, [arg,...])"cr"Appel du script ARexx"cr"avec passage de 0"cr"à 15 arguments."
when fonction='TITLE' then return "TITLE(titre_fenêtre)"cr"Affiche le titre"cr"spécifié dans la"cr"barre de titre de"cr"la fenêtre courante."
when fonction='CATLINES' then return "CATLINES(ligne)"cr"Unit la ligne"cr"spécifiée et la"cr"ligne qui la suit"
when fonction='CUTLINE' then return "CUTLINE(alignement)"cr"Coupe la ligne"cr"et aligne la fin"cr"sur celle-ci"cr"si demandé"
when fonction='INSLINES' then return "INSLINES(nombre lignes)"cr"Insère le nombre"cr"de lignes spécifié"
when fonction='SUPLINES' then return "SUPLINES(nombre lignes)"cr"Supprime le nombre"cr"de lignes spécifié"
when fonction='WORD' then return "WORD(0)"cr"Renvoie le mot"cr"courant"
when fonction='READCHAR' then return "READCHAR(caractères)"cr"Renvoie le nombre"cr"de caractères"cr"spécifié"
when fonction='SETTABS' then return "SETTABS(tabulations)"cr"Fixe le nombre"cr"d'espaces par"cr"tabulation"
when fonction='DELBEGIN' then return "DELBEGIN(0)"cr"Efface le début de"cr"la ligne courante"
when fonction='DELCHARS' then return "DELCHARS(caractères)"cr"Efface le nombre"cr"de caractères"cr"spécifié"
when fonction='DELEND' then return "DELEND(0)"cr"Efface la fin"cr"de la ligne"
when fonction='DELLEFT' then return "DELLEFT(n)"cr"Effacement de n"cr"mots situés à gauche"cr"du curseur"
when fonction='DELRIGHT' then return "DELRIGHT(n)"cr"Effacement de n"cr"mots situés à droite"cr"du curseur"
when fonction='DELPREV' then return "DELPREV(caractères)"cr"Efface le nombre"cr"de caractères"cr"spécifiés, situés"cr"avant le curseur"
when fonction='WRITE' then return "WRITE(chaîne)"cr"Écriture de la"cr"chaîne de caractères"cr"spécifiée"
when fonction='WRITETAB' then return "WRITETAB(tabulations)"cr"Écriture du nombre"cr"de tabulations spécifié"cr"ou déplacement seul"cr"si argument négatif"
when fonction='MODEDIT' then return "MODEDIT(0/1)"cr"Fixe le mode d'écriture"cr"MODEDIT(0): surimpression"cr"MODEDIT(1): insertion "
when fonction='PICKCOL' then return "PICKCOL(titre)"cr"Renvoie le numéro"cr"de colonne dans lequel"cr"clique l'utilisateur"
when fonction='PICKLINE' then return "PICKLINE(titre)"cr"Renvoie le numéro"cr"de ligne dans lequel"cr"clique l'utilisateur"
when fonction='HELP' then return "HELP(fonction)"cr"Affiche l'aide"cr"en utilisant"cr"AmigaGuide"
otherwise return fonction||cr"Fonction ou macro inconnue"
end
return ""
end
syntax:
erreur=RC
'UNLOCK(-1)'
'MESSAGE("Script AideMacros"+CHR(10)+"Erreur de syntaxe"+CHR(10)+"en ligne 'SIGL'"+CHR(10)+"'errortext(erreur)'")'
exit
error:
'UNLOCK(-1)'
'MESSAGE("Script AideMacros"+CHR(10)+"Erreur en ligne 'SIGL'")'
